home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / SYMBOL / Conversions / Vectors / vector-to-strings < prev    next >
Encoding:
Text File  |  1998-10-23  |  699 b   |  25 lines  |  [TEXT/ScoM]
  1. vector-to-strings rows length &rest vectors
  2.  
  3. Returns the output of vectors as strings of given length and number of rows in a list. The output can be applied to def-rhythm-apply and compile-song-apply.
  4.  
  5. (def-rhythm-apply
  6.    solo   '1/16    (a b (-1 c))
  7.    riff1  '1/8     symbols
  8.    riff2  '1/16    (eval (symbol-trim 8 symbols))
  9.    b&s    '1/16t   (a)
  10.    complex rhythm  (a)
  11.  
  12.    (vector-to-strings 4 16 'normal
  13.                      (gen-sin 3 0.5 64)
  14.                      (gen-sin 2 0.5 64 30))
  15. )
  16.  
  17. (vector-to-strings 4 16 'normal
  18.                    (gen-sin 3 0.5 64)
  19.                    (gen-sin 2 0.5 64 30))
  20. -->
  21. ("---   -------   " 
  22.  "- -  - -       -" 
  23.  "   -    - -- -  " 
  24.  "   ----  -  ----")
  25.